home *** CD-ROM | disk | FTP | other *** search
/ Turnbull China Bikeride / Turnbull China Bikeride - Disc 1.iso / ARGONET / PD / PROGRAMMING / DESKLIBC / SOURCES.ZIP / DeskLib / !DLSources / Libraries / WimpSWIs / s / 50CmdWind < prev   
Text File  |  1995-08-26  |  1KB  |  46 lines
  1. ;
  2. ;       Title                  : Wimp Command Window
  3. ;       System                 : Wimp Library
  4. ;       Version                : 1.01
  5. ;       Copyright              : (C) John Winters
  6. ;       Date                   : 12th January, 1990
  7. ;       Author                 : John H. Winters
  8. ;
  9. ;       Function               : Opens a command window.
  10. ;
  11. ;
  12. ;       Modification history.
  13. ;       Date                   :  03 Apr 1993
  14. ;       Author                 :  Shaun Blackmore
  15. ;
  16. ;
  17. ;============================================================================
  18. ;
  19. ;  Include files.
  20. ;
  21. ;============================================================================
  22. ;
  23.         GET     ^.h.regdefs
  24.         GET     ^.h.swinos
  25.         GET     ^.h.macros
  26. ;
  27. ;============================================================================
  28. ;
  29. ;  Code.
  30. ;
  31. ;============================================================================
  32. ;
  33.         PREAMBLE
  34.         STARTCODE Wimp_CommandWindow
  35. ;
  36. ;        STMFD   sp!, {lr}
  37.         MOV     ip, lr
  38.  
  39.         SWI     SWI_Wimp_CommandWindow + XOS_Bit
  40.         MOVVC   a1, #0
  41.  
  42.         MOVS    pc, ip
  43. ;        LDMFD   sp!, {pc}^
  44. ;
  45.         END
  46.